﻿Public Class clsLink
    Public Property Url As String
    Public Property Viewed As Boolean
    Public Property Name As String
    Public Sub New(ls As String)
        Url = ls
        Viewed = False
    End Sub
End Class
